myvar_0 = GetPrimitiveParameter(0)
myvar_1 = GenericNeighborDataTable["new"](myvar_0, gNeighborDataTableID["Best Friends Forever List"], "Best Friend Forever List")
local myvar_2 = 0
{R3},{R4},myvar_5,myvar_6 = myvar_1["GetTableKeys"](myvar_1)
for myvar_5, myvar_6 in myvar_1["GetTableKeys"](myvar_1) do 
	if (GlobalObjManager["verifyNeighborId"](GlobalObjManager, myvar_6) ~= 0) then 


	myvar_7 = GenericNeighborDataTable["new"](myvar_6, gNeighborDataTableID["Best Friends Forever List"], "Best Friend Forever List")
		if (myvar_1["HasProperty"](myvar_1, myvar_6) ~= 0) then 


		myvar_1["GetProperty"](myvar_1, myvar_6)
			if (2 <= table["getn"]()) then
		else
				if (myvar_7["HasProperty"](myvar_7, myvar_0) ~= 0) then 


				myvar_7["GetProperty"](myvar_7, myvar_0)
					if (2 <= table["getn"]()) then
					local myvar_9 = True
				end
			end
		end
	end
		if (GetNeighborRelationship(myvar_0, myvar_6, RelVars["Flags"]) ~= 0) then 


			if (myvar_9 ~= 0) then 
myvar_9 = myvar_9

				if ((myvar_7["GetProperty"](myvar_7, myvar_0)[GenericNeighborDataTable["BFF"]["Time Left"]] - 1) <= 0) then
				myvar_1["RemoveProperty"](myvar_1, myvar_6)
				myvar_7["RemoveProperty"](myvar_7, myvar_0)
					if (GetNeighborRelationship(myvar_0, myvar_6, RelVars["Flags2"]) == False) then
				end
					if (myvar_7["GetProperty"](myvar_7, myvar_0)[GenericNeighborDataTable["BFF"]["Remove/Add"]] == 1) then
				else
				end
				SetNeighborRelationship(myvar_0, myvar_6, RelVars["Flags2"], ClearBit(SetBit(0, RelFlags2["BFF"]), RelFlags2["BFF"]))
					if (GetNeighborRelationship(myvar_6, myvar_0, RelVars["Flags2"]) == False) then
				end
					if (myvar_7["GetProperty"](myvar_7, myvar_0)[GenericNeighborDataTable["BFF"]["Remove/Add"]] == 1) then
				else
				end
				SetNeighborRelationship(myvar_6, myvar_0, RelVars["Flags2"], ClearBit(SetBit(0, RelFlags2["BFF"]), RelFlags2["BFF"]))
					if (myvar_7["GetProperty"](myvar_7, myvar_0)[GenericNeighborDataTable["BFF"]["Remove/Add"]] == 1) then
					myvar_2 = myvar_2 + 1
					local myvar_15 = "CT - Handle BFF Link"
					myvar_16 = GetRunningOnObjectId()
					RunTree(myvar_15, myvar_16, myvar_0, myvar_6)
				else
					myvar_7["GetProperty"](myvar_7, myvar_0)[GenericNeighborDataTable["BFF"]["Time Left"]] = (myvar_7["GetProperty"](myvar_7, myvar_0)[GenericNeighborDataTable["BFF"]["Time Left"]] - 1)
					myvar_1["SetProperty"](myvar_1, myvar_6, myvar_7["GetProperty"](myvar_7, myvar_0))
					myvar_11 = GetNeighborData(myvar_6, NeighborData["person instance id"])
						if (myvar_11 == 0) then
						
myvar_11 = myvar_7["SetProperty"]
						myvar_11(myvar_7, myvar_0, myvar_7["GetProperty"](myvar_7, myvar_0))
					else
						myvar_11 = myvar_1

						myvar_1["RemoveProperty"](myvar_11, myvar_6)
						myvar_11 = myvar_7

						myvar_7["RemoveProperty"](myvar_11, myvar_0)
					else
						
myvar_7 = myvar_1["RemoveProperty"]
						myvar_9 = myvar_6
						myvar_7(myvar_1, myvar_9)
					end
				end
			end
		end
	end
end
end
myvar_5 = myvar_2
SetTemp(0, myvar_5)
local myvar_4 = True
SetScriptReturnValue(myvar_4)
